!------------------------------egs5_uphiin.f----------------------------
! Version: 051219-1435
!-----------------------------------------------------------------------
!23456789|123456789|123456789|123456789|123456789|123456789|123456789|12

      common/UPHIIN/                   
     * sinc0,
     * sinc1,
     * sin0(MXSINC),
     * sin1(MXSINC)                           

      real*8 sinc0,sinc1,sin0,sin1

!-----------------------last line of egs5_uphiin.f---------------------
